home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 7 / BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso / Files / Hyper / K-L / LImacSTACK-8⁄89.cpt / LImacSTACK.8_89 / background_20742.txt < prev    next >
Text File  |  1989-08-04  |  6KB  |  270 lines
  1. -- background: 20742 from stack: in.8_89
  2. -- bmap block id: 21012
  3. -- flags: 0000
  4. -- background id: 0
  5. -- name: Help Bg
  6. ----- HyperTalk script -----
  7. on openCard
  8.   show bg btn "More..."
  9.   show bg btn "Go List"
  10. end openCard
  11.  
  12.  
  13. -- part 1 (field)
  14. -- low flags: 03
  15. -- high flags: 2000
  16. -- rect: left=19 top=39 right=126 bottom=158
  17. -- title width / last selected line: 0
  18. -- icon id / first selected line: 0 / 0
  19. -- text alignment: 1
  20. -- font id: 3
  21. -- text size: 18
  22. -- style flags: 10496
  23. -- line height: 24
  24. -- part name: Help Title
  25.  
  26.  
  27. -- part 2 (button)
  28. -- low flags: 00
  29. -- high flags: 0000
  30. -- rect: left=445 top=298 right=320 bottom=474
  31. -- title width / last selected line: 0
  32. -- icon id / first selected line: 6721 / 6721
  33. -- text alignment: 1
  34. -- font id: 0
  35. -- text size: 12
  36. -- style flags: 0
  37. -- line height: 16
  38. -- part name: Return
  39. ----- HyperTalk script -----
  40. on mouseUp
  41.   visual iris close to grey
  42.   visual iris open
  43.   pop cd
  44. end mouseUp
  45.  
  46.  
  47.  
  48. -- part 3 (button)
  49. -- low flags: 00
  50. -- high flags: 0000
  51. -- rect: left=423 top=300 right=320 bottom=449
  52. -- title width / last selected line: 0
  53. -- icon id / first selected line: 2749 / 2749
  54. -- text alignment: 1
  55. -- font id: 0
  56. -- text size: 12
  57. -- style flags: 0
  58. -- line height: 16
  59. -- part name: Multi-Next
  60. ----- HyperTalk script -----
  61. on mouseDown
  62.   visual  scroll left
  63.   go to next cd of this bg
  64.   put the ticks into tickHolder
  65.   repeat until (the mouse is up)
  66.     if (the ticks - tickHolder) > 30
  67.     then
  68.     go to next cd of this bg
  69.     put the ticks into tickHolder
  70.   end if
  71. end repeat
  72. end mouseDown
  73.  
  74.  
  75.  
  76. -- part 4 (button)
  77. -- low flags: 00
  78. -- high flags: 0000
  79. -- rect: left=403 top=300 right=320 bottom=428
  80. -- title width / last selected line: 0
  81. -- icon id / first selected line: 25234 / 25234
  82. -- text alignment: 1
  83. -- font id: 0
  84. -- text size: 12
  85. -- style flags: 0
  86. -- line height: 16
  87. -- part name: Multi-Prev
  88. ----- HyperTalk script -----
  89. on mouseDown
  90.   visual scroll right
  91.   go to prev cd of this bg
  92.   put the ticks into tickHolder
  93.   repeat until (the mouse is up)
  94.     if (the ticks - tickHolder) > 30
  95.     then
  96.     go to prev cd of this bg
  97.     put the ticks into tickHolder
  98.   end if
  99. end repeat
  100. end mouseDown
  101.  
  102.  
  103.  
  104. -- part 5 (button)
  105. -- low flags: 00
  106. -- high flags: 0000
  107. -- rect: left=382 top=299 right=320 bottom=404
  108. -- title width / last selected line: 0
  109. -- icon id / first selected line: 4465 / 4465
  110. -- text alignment: 1
  111. -- font id: 3
  112. -- text size: 9
  113. -- style flags: 0
  114. -- line height: 12
  115. -- part name: Index
  116. ----- HyperTalk script -----
  117. on mouseUp
  118.   push cd
  119.   visual barn door close to black
  120.   visual barn door open
  121.   go cd "LImacSTACK index"
  122. end mouseUp
  123.  
  124.  
  125.  
  126. -- part 8 (button)
  127. -- low flags: 00
  128. -- high flags: 8003
  129. -- rect: left=34 top=158 right=180 bottom=134
  130. -- title width / last selected line: 0
  131. -- icon id / first selected line: 0 / 0
  132. -- text alignment: 1
  133. -- font id: 0
  134. -- text size: 12
  135. -- style flags: 0
  136. -- line height: 16
  137. -- part name: Fonts
  138. ----- HyperTalk script -----
  139. on mouseUp
  140.   lock screen
  141.   go card "Font Help"
  142.   unlock screen with visual wipe right
  143. end mouseUp
  144.  
  145.  
  146.  
  147. -- part 10 (button)
  148. -- low flags: 00
  149. -- high flags: 8003
  150. -- rect: left=34 top=183 right=205 bottom=134
  151. -- title width / last selected line: 0
  152. -- icon id / first selected line: 0 / 0
  153. -- text alignment: 1
  154. -- font id: 0
  155. -- text size: 12
  156. -- style flags: 0
  157. -- line height: 16
  158. -- part name: Sounds
  159. ----- HyperTalk script -----
  160. on mouseUp
  161.   go card "Sound Help"
  162. end mouseUp
  163.  
  164.  
  165.  
  166. -- part 11 (field)
  167. -- low flags: 03
  168. -- high flags: 2000
  169. -- rect: left=178 top=36 right=299 bottom=482
  170. -- title width / last selected line: 0
  171. -- icon id / first selected line: 0 / 0
  172. -- text alignment: 0
  173. -- font id: 3
  174. -- text size: 12
  175. -- style flags: 8192
  176. -- line height: 16
  177. -- part name: Help Text
  178.  
  179.  
  180. -- part 12 (button)
  181. -- low flags: 00
  182. -- high flags: 8003
  183. -- rect: left=119 top=274 right=296 bottom=168
  184. -- title width / last selected line: 0
  185. -- icon id / first selected line: 0 / 0
  186. -- text alignment: 1
  187. -- font id: 3
  188. -- text size: 9
  189. -- style flags: 0
  190. -- line height: 12
  191. -- part name: Go List
  192. ----- HyperTalk script -----
  193. on mouseUp
  194.   push cd
  195.   visual dissolve
  196.   go card "Resource Lister"
  197. end mouseUp
  198.  
  199.  
  200.  
  201. -- part 13 (button)
  202. -- low flags: 00
  203. -- high flags: 8003
  204. -- rect: left=34 top=208 right=230 bottom=134
  205. -- title width / last selected line: 0
  206. -- icon id / first selected line: 0 / 0
  207. -- text alignment: 1
  208. -- font id: 0
  209. -- text size: 12
  210. -- style flags: 0
  211. -- line height: 16
  212. -- part name: Icons
  213. ----- HyperTalk script -----
  214. on mouseUp
  215.   go card "Icon Help"
  216. end mouseUp
  217.  
  218.  
  219.  
  220. -- part 14 (field)
  221. -- low flags: 83
  222. -- high flags: 2001
  223. -- rect: left=178 top=36 right=299 bottom=483
  224. -- title width / last selected line: 0
  225. -- icon id / first selected line: 0 / 0
  226. -- text alignment: 0
  227. -- font id: 3
  228. -- text size: 12
  229. -- style flags: 8192
  230. -- line height: 16
  231. -- part name: Help Text2
  232.  
  233.  
  234. -- part 15 (button)
  235. -- low flags: 00
  236. -- high flags: 8003
  237. -- rect: left=412 top=274 right=296 bottom=484
  238. -- title width / last selected line: 0
  239. -- icon id / first selected line: 0 / 0
  240. -- text alignment: 1
  241. -- font id: 0
  242. -- text size: 12
  243. -- style flags: 0
  244. -- line height: 16
  245. -- part name: More...
  246. ----- HyperTalk script -----
  247. on mouseUp
  248.   set the visible of fld "help text2" to not visible of fld "help text2"
  249. end mouseUp
  250.  
  251.  
  252.  
  253. -- part 16 (button)
  254. -- low flags: 00
  255. -- high flags: 8003
  256. -- rect: left=34 top=232 right=254 bottom=134
  257. -- title width / last selected line: 0
  258. -- icon id / first selected line: 0 / 0
  259. -- text alignment: 1
  260. -- font id: 0
  261. -- text size: 12
  262. -- style flags: 0
  263. -- line height: 16
  264. -- part name: Navigation
  265. ----- HyperTalk script -----
  266. on mouseUp
  267.   go card "Navigation Help"
  268. end mouseUp
  269.  
  270.